DEFINITION MODULE RealMath; (* Dima 27-Mar-88. (c) KRONOS *)

CONST PI =3.1415926--5358979
    ; E  =2.7182818--28459045
    ; eps=0.000001;

PROCEDURE Sqrt(x:REAL):REAL;

PROCEDURE Sin(x:REAL):REAL;
PROCEDURE Cos(x:REAL):REAL;
PROCEDURE Tg (x:REAL):REAL;
PROCEDURE Ctg(x:REAL):REAL;

PROCEDURE Exp(x:REAL):REAL;
PROCEDURE Ln (x:REAL):REAL;
PROCEDURE Pow(x,y:REAL):REAL; -- x**y
PROCEDURE Log(x,y:REAL):REAL; -- log_x_(y)

END RealMath.
